use "C:\Users\Andy baker\OneDrive - UCB-O365\My Documents\Research\Paper Book Networks\Chapter 4 Campaigns\Data\Ciro CIs.dta" , clear

*Figure 4.10
twoway (rcap lower upper xaxis, horizontal color(black)) (scatter xaxis mean , mcolor(black)), ///
ylab(1.5 "All News" 2.5 "HEG" 3.5 "TV news", noticks labgap(40)) ///
ymlab(1.75 "Ciro Supporters (early {it:c})" 1.5 "Ciro Supporters (late {it:c})" 1.25 "Ciro Voters ({it:e})" 2.75 "Ciro Supporters (early {it:c})" 2.5 "Ciro Supporters (late {it:c})" 2.25 "Ciro Voters ({it:e})" 3.75 "Ciro Supporters (early {it:c})" 3.5 "Ciro Supporters (late {it:c})" 3.25 "Ciro Voters ({it:e})", angle(horizontal) labsize(medsmall)) ///
ytitle("{bf:Media Source, Voter Group, and Timing}") legend(off) yline(2 3, lcolor(black)) ytick(2 3, tlength(43)) ///
xscale(range(0 1)) graphregion(color(white)) plotregion(lstyle(yxline) lcolor(black)) ///
xtitle("{bf:Degree of Exposure to Media Source}" "(in standard deviations)") ///
text(3.75 0 "{it:N}=656", size(small)) text(3.5 0 "{it:N}=355", size(small)) text(3.25 0 "{it:N}=215", size(small)) text(2.75 .95 "{it:N}=555", size(small)) text(2.5 .95 "{it:N}=296", size(small)) text(2.25 .95 "{it:N}=215", size(small)) ///
text(1.75 .95 "{it:N}=657", size(small)) text(1.5 .95 "{it:N}=357", size(small)) text(1.25 .95 "{it:N}=215", size(small))


graph export "C:\Users\Andy baker\OneDrive - UCB-O365\My Documents\Research\Paper Book Networks\Chapter 4 Campaigns\Figures\Ciro CIs.tif", as(tif) replace
graph export "C:\Users\Andy baker\OneDrive - UCB-O365\My Documents\Research\Paper Book Networks\Publishers\Final Manuscript\Final Figures\BAR4_10.tif", as(tif) replace width(1500)
graph export "C:\Users\Andy baker\OneDrive - UCB-O365\My Documents\Research\Paper Book Networks\Publishers\Final Manuscript\Final Figures\BAR4_10.pdf", as(pdf) replace 
